// Copyright (c) 2009, Meadhbh Hamrick
// All rights reserved.
// 
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are met:
// 
//      * Redistributions of source code must retain the above copyright
//        notice, this list of conditions and the following disclaimer.
//      * Redistributions in binary form must reproduce the above copyright
//       notice, this list of conditions and the following disclaimer in the
//       documentation and/or other materials provided with the distribution.
//     * Neither the name of the Project Meadhbh nor the
//       names of its contributors may be used to endorse or promote products
//       derived from this software without specific prior written permission.
// 
// THIS SOFTWARE IS PROVIDED BY MEADHBH HAMRICK ''AS IS'' AND ANY
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
// WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
// DISCLAIMED. IN NO EVENT SHALL MEADHBH HAMRICK BE LIABLE FOR ANY
// DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
// LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
// ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

integer face;

stroke_face ( ) {
    vector offset;
    if ( 0 == face ) {
        offset = <0.0,0.333,0.0>;
    } else if ( 1 == face ) {
        offset = <0.0,0.111,0.0>;
    } else if ( 2 == face ) {
        offset = <0.0,-0.111,0.0>;
    } else {
        offset = <0.0,-.333,0.0>;
    }

    llSetPrimitiveParams( [ PRIM_TEXTURE, 2,
    "4b2b744a-7203-dcc7-3d8e-db8aa195f103", <1.0,0.111,0.0>, offset, 0
    ] );
}

default
{
    state_entry()
    {
        face = 0;
        stroke_face();
    }

    touch_start(integer total_number)
    {
        face = face + 1;
        if( face > 3 ) { 
            face = 0;
        }
        stroke_face();
    }
}
